Eagles Nest BBS 7/Eagles_Nest_Mac_Collection_Disc_7.TOAST/PD General/StarTrekDS9/Star Trek-DS9 Guide 2.0/background_2623.xml

Extensible Markup Language | 1994-08-05 | 113KB | 2,416 lines

<?xml version="1.0" encoding="utf-8" ?>
<!DOCTYPE background PUBLIC "-//Apple, Inc.//DTD background V 2.0//EN" "" >
<background>
    <id>2623</id>
    <filler1>0</filler1>
    <bitmap>BMAP_3229.pbm</bitmap>
    <cantDelete> <true /> </cantDelete>
    <showPict> <true /> </showPict>
    <dontSearch> <false /> </dontSearch>
    <link rel="stylesheet" type="text/css" href="stylesheet_33129.css" />
    <part>
        <id>1</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>101</left>
            <top>5</top>
            <right>424</right>
            <bottom>31</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>18</textSize>
        <textStyle>plain</textStyle>
        <textHeight>24</textHeight>
        <name>Title</name>
        <script>on closeField--This holds the title of this episode.global oldTitle,uLevel,cantSortput me into newTitleput "Season " & field "Season" into theSeasonset the cursor to watchlock screenpush cardgo to card "Episode Lists"set dontSearch of this card to falseif oldTitle is empty thenput newTitle & return after field theSeasonput newTitle & return after field "Alphabetic List"elsefind whole oldTitle in field theSeasonif the result is empty then put newTitle into the foundLineput alterList(oldTitle) into oldTitleput alterList(newTitle) into newTitlefind whole oldTitle in field "Alphabetic List"if the result is empty then put newTitle into the foundLineend ifget field theSeasonrepeat with n = the number of lines of it down to 1if line n of it is empty then delete line n of itend repeatput it into field theSeasonput false into cantSortset the userlevel to 5get field "Alphabetic List"put alterList(it) into itsort lines of itput it into field "Alphabetic List"set the userlevel to uLevelput true into cantSortput newTitle into oldTitleset dontSearch of this card to truepop cardunlock screenend closeField</script>
    </part>
    <part>
        <id>19</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>62</top>
            <right>486</right>
            <bottom>90</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>Writers</name>
        <script>on mouseUp--This holds the writers of this episode (the people--who created the plot and the story). Often, the--writers of the teleplay are listed separately (the--people who wrote the actual script and the dialog).end mouseUp</script>
    </part>
    <part>
        <id>33</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>95</top>
            <right>264</right>
            <bottom>111</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>Director</name>
        <script>on mouseUp--This holds the director of this episode.end mouseUp</script>
    </part>
    <part>
        <id>5</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>113</top>
            <right>216</right>
            <bottom>128</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>Stardate</name>
        <script>on mouseUp--This holds the Stardate of this episode. All shows with--Stardates in the 46000's are in the first season (DS9--started in TNG's 6th season), the 47000's are the second--season, etc. If "(est)" appears after the Stardate, then--it has been estimated.end mouseUp</script>
    </part>
    <part>
        <id>28</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>130</top>
            <right>216</right>
            <bottom>144</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Air Date</name>
        <script>on mouseUp--This holds the date the episode was first--shown on televison (the first Saturday).end mouseUp</script>
    </part>
    <part>
        <id>2</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>144</top>
            <right>197</right>
            <bottom>158</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Season</name>
        <script>on mouseUp--This holds the season number of this episode.end mouseUp</script>
    </part>
    <part>
        <id>3</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>158</top>
            <right>197</right>
            <bottom>172</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Number</name>
        <script>on mouseUp--This holds the show number, in the order that the--episodes were broadcast. If there are two numbers,--the first is the number since the premiere, and--the second is the number within the season--(e.g. '101 (1)' is the 101st show, but the 1st of--the season).end mouseUp</script>
    </part>
    <part>
        <id>109</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>17</left>
            <top>112</top>
            <right>71</right>
            <bottom>125</bottom>
        </rect>
        <style>transparent</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Helvetica</font>
        <textSize>12</textSize>
        <textStyle>outline</textStyle>
        <textStyle>bold</textStyle>
        <name> Next</name>
        <script>on mouseUpsend "mouseUp" to bg button "Find"end mouseUp</script>
    </part>
    <part>
        <id>104</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>128</left>
            <top>172</top>
            <right>204</right>
            <bottom>186</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Program Number</name>
        <script>on mouseUp--This holds the official Paramount program number--of this episode. The numbers start with 721, but--usually in the 400's. They also indicate the order--in which the episodes were filmed, which may not--be the order in which they were shown.end mouseUp</script>
    </part>
    <part>
        <id>4</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <true /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>284</left>
            <top>104</top>
            <right>499</right>
            <bottom>173</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>11</textHeight>
        <name>Guests</name>
        <script>on mouseUp--This holds the additional actors who were in--this episode. Several of the show regulars--are listed here (in italics).end mouseUp</script>
    </part>
    <part>
        <id>6</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>79</left>
            <top>195</top>
            <right>499</right>
            <bottom>322</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <true /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Long Synopsis</name>
        <script>on mouseUp--This holds the long plot synopsis of this--episode. These were written by Jennifer--Hawthorne and included with her permission.end mouseUp</script>
    </part>
    <part>
        <id>29</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>254</top>
            <right>64</right>
            <bottom>288</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Report</name>
        <script>on mouseUp--Click here to show or hide the Report Creation--window, which allows you to create a variety of--reports and save them to a file or print them.set cursor to watchif the visible of bg button "Hide Report" is false thenif the visible of bg button "Hide Marks" is true thensend "mouseUp" to bg button "Hide Marks"end ifif the visible of bg button "Hide Info" is true thensend "mouseUp" to bg button "Hide Info"end iflock screenshow bg button "Hide Report"show bg button "Create a Report"show field "Report Back"show field "Report Type"show field "Which Shows"show field "Send Where"if field "Send Where" contains "file" thenshow field "File Creator"show bg button "Pulldown 4"end ifshow bg button "Make Report"show bg button "Pulldown 1"show bg button "Pulldown 2"show bg button "Pulldown 3"unlock screen with dissolve very fastelsesend "mouseUp" to bg button "Hide Report"end ifend mouseUp</script>
    </part>
    <part>
        <id>9</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>106</top>
            <right>64</right>
            <bottom>140</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>outline</textStyle>
        <textStyle>bold</textStyle>
        <name>Find</name>
        <script>on mouseUp--Click here to search for a specific name or word.----Hold down the Option key and click here to--make this into a "Find Next" command.global findStr,oldChunkNumput false into optionDownif the optionKey is down then put true into optionDownif not optionDown or findStr is empty thenask "Find what?" with findStrif it is empty then exit mouseUpput it into findStrput 0 into oldChunkNumend ifset cursor to watchput the number of this card into oldCardNumput false into alreadyFoundlock screenif optionDown thenPromptoid "Now searching for another listing of '" & findStr & "'.",24354elsePromptoid "Now searching for '" & findStr & "'.",24354end ifrepeat foreverif the number of words of findStr > 1 thenfind whole findStrelsefind findStrend ifif the result is not empty thengo to card oldCardNumclose window "Promptoid"unlock screenplayBeepanswer "Could not find '" & findStr & "'." with "OK"exit mouseUpelseput word 2 of the foundChunk into fChunkNum   --starting char numput the number of this card into fCardNumif fCardNum = oldCardNum thenif fChunkNum = oldChunkNum thenif not alreadyFound thenput true into alreadyFoundnext repeatelseclose window "Promptoid"unlock screenplayBeepanswer "No further listings of '" & findStr & "'." with "OK"exit mouseUpend ifend ifif fChunkNum <= oldChunkNum then next repeatend ifexit repeatend ifend repeatput fChunkNum into oldChunkNumclose window "Promptoid"put the foundField into theFieldif the visible of theField is false thenput the last word of theField into fieldNumhiddenField fieldNumend ifunlock screen with dissolve fastselect the foundChunkend mouseUp————————————————————————————————————————————————————————————————————————on hiddenField fieldNumput field "Short or Long" into currentFieldshow field fieldNumif fieldNum = the number of field "Short Synopsis" thenhide field currentFieldput "Short Synopsis" into field "Short or Long"end ifif fieldNum = the number of field "Long Synopsis" thenhide field currentFieldput "Long Synopsis" into field "Short or Long"end ifif fieldNum = the number of field "Episode Notes" thenhide field currentFieldput "Episode Notes" into field "Short or Long"end ifput field "Cast or Guests" into currentFieldif fieldNum = the number of field "Main Cast" thenhide field currentFieldput "Main Cast" into field "Cast or Guests"end ifif fieldNum = the number of field "Guests" thenhide field currentFieldput "Guests" into field "Cast or Guests"end ifend hiddenField————————————————————————————————————————————————————————————————————————on mouseWithinif the optionKey is down thenshow bg button " Next"elsehide bg button " Next"end ifend mouseWithin</script>
    </part>
    <part>
        <id>13</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>131</left>
            <top>329</top>
            <right>242</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Tape Name</name>
        <script>on mouseUp--This holds the name of the video tape which--contains this episode.end mouseUp</script>
    </part>
    <part>
        <id>14</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <true /> </autoTab>
        <lockText> <false /> </lockText>
        <rect>
            <left>283</left>
            <top>329</top>
            <right>348</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Count</name>
        <script>on mouseUp--This holds the tape count where this episode--can be found on its video tape.end mouseUp</script>
    </part>
    <part>
        <id>15</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>291</top>
            <right>64</right>
            <bottom>325</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>outline</textStyle>
        <textStyle>bold</textStyle>
        <name>Quit</name>
        <script>on mouseUp--Click here to quit HyperCard.doMenu "Quit HyperCard"end mouseUp</script>
    </part>
    <part>
        <id>16</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>93</left>
            <top>34</top>
            <right>118</right>
            <bottom>56</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Prev</name>
        <script>on mouseDown--Click here to see the previous show.mouseStillDownend mouseDown————————————————————————————————————————————————————————————————————————on mouseStillDownlock screengo to prev card of this bgunlock screen with wipe right fastend mouseStillDown</script>
    </part>
    <part>
        <id>17</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>465</left>
            <top>34</top>
            <right>490</right>
            <bottom>56</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Next</name>
        <script>on mouseDown--Click here to see the next show.mouseStillDownend mouseDown————————————————————————————————————————————————————————————————————————on mouseStillDownlock screengo to next card of this bgunlock screen with wipe left fastend mouseStillDown</script>
    </part>
    <part>
        <id>20</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>70</left>
            <top>5</top>
            <right>102</right>
            <bottom>31</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>24354</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>About</name>
        <script>on mouseUp--Click here to see the credit screen.global soundOnif soundOn then play "DS9_Theme"picture "Star Trek-DS9 Guide",resource,shadow,false,0set the loc of window "Star Trek-DS9 Guide" to "174,72"show window "Star Trek-DS9 Guide"show field "Credit Button"end mouseUp</script>
    </part>
    <part>
        <id>26</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>143</top>
            <right>64</right>
            <bottom>177</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>outline</textStyle>
        <textStyle>bold</textStyle>
        <name>Go To</name>
        <script>on mouseUp--Click here to display a list of episode names.--You can see the episode lists displayed by season,--or the entire list in alphabetical order (All).--You can view the information on that episode by--clicking on an episode name.global ListSelectExit,numSeasonsput false into bySeasonput field "Season" into seasonput field "Alphabetic List" of card "Episode Lists" into theListrepeat foreverif bySeason thenget ListSelect("ONE",getList(season),"Go to an episode from Season " & season,"Geneva,9",600)elseget ListSelect("ONE",theList,"  Go to an episode (List of All)","Geneva,9",600)if it is not empty then put restoreList(it) into itend ifif it is empty then exit mouseUp  --"Cancel"set cursor to watchif ListSelectExit is "All" thenput false into bySeasonnext repeatend ifif ListSelectExit is in "1,2,3,4,5,6,7" then   --Season Numberput ListSelectExit into numif num > numSeasons thenplayBeepelseput num into seasonput true into bySeasonend ifnext repeatend iflock screenput it into theTitlefind whole theTitle in field "Title"unlock screen with dissolve fastexit repeatend repeatend mouseUp————————————————————————————————————————————————————————————————————————function getList seasonset cursor to watchput "Season " & season into whichFieldget field whichField of card "Episode Lists"return itend getList</script>
    </part>
    <part>
        <id>35</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>79</left>
            <top>195</top>
            <right>499</right>
            <bottom>322</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <true /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>14</textSize>
        <textStyle>plain</textStyle>
        <textHeight>18</textHeight>
        <name>Short Synopsis</name>
        <script>on mouseUp--This holds the short synopsis of this episode.--This is a short description of the plot which is--printed out with the episode reports.end mouseUp</script>
    </part>
    <part>
        <id>37</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>0</left>
            <top>0</top>
            <right>512</right>
            <bottom>12</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Menubar</name>
        <script>--Menubar button by Adam C. Engston mouseEnterput item 3 of the screenRect into screenWidthif screenWidth <= 512 then show menubarend mouseEnter————————————————————————————————————————————————————————————————————————on mouseLeaveput item 3 of the screenRect into screenWidthif screenWidth <= 512 then hide menubarend mouseLeave</script>
    </part>
    <part>
        <id>41</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>180</top>
            <right>64</right>
            <bottom>214</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>outline</textStyle>
        <textStyle>bold</textStyle>
        <name>Mark</name>
        <script>on mouseUp--Click here to show or hide the Show Marking window.--Once shows are marked, you can print reports for them.set cursor to watchif the visible of bg button "Hide Marks" is false thenif the visible of bg button "Hide Info" is true thensend "mouseUp" to bg button "Hide Info"end ifif the visible of bg button "Hide Report" is true thensend "mouseUp" to bg button "Hide Report"end iflock screenshow bg button "Hide Marks"show bg button "Mark the Shows"show field "Mark Back"show field "Which Field"show field "What Condition"show bg button "P1"set the style of field "What Condition" to transparentif field "Which Field" is not "Show Taped" thenshow field "What Target"show bg button "P3"elseset the style of field "What Condition" to shadowshow bg button "P2"end ifshow bg button "Do It"show bg button "Unmark All"show field "Show List"show field "Num Marked"put empty into field "Done It"unlock screen with dissolve very fastelsesend "mouseUp" to bg button "Hide Marks"end ifend mouseUp</script>
    </part>
    <part>
        <id>72</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <true /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>284</left>
            <top>104</top>
            <right>499</right>
            <bottom>173</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>11</textHeight>
        <name>Main Cast</name>
        <script>on mouseUp--This holds the main actors who are regulars--on the show for this season.end mouseUp</script>
    </part>
    <part>
        <id>73</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>346</left>
            <top>91</top>
            <right>432</right>
            <bottom>105</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>bold</textStyle>
        <textHeight>13</textHeight>
        <name>Cast or Guests</name>
        <script>on mouseDown--This pop-up menu allows you to select whether to--view the cast or the guests. Hold down the mouse button--here to see your choices. Move the cursor to your--choice and release the mouse button.put "Main Cast" & return & "Guests" & return into choicesput -1 into checkedif me is "Main Cast" then put -2 into checkedget HPopupMenu(choices,checked,top of me,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownput theChoice into melock screenif theChoice is "Guests" thenhide field "Main Cast"elsehide field "Guests"end ifshow field meunlock screen with dissolve very fastend mouseDown</script>
    </part>
    <part>
        <id>64</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>395</left>
            <top>329</top>
            <right>436</right>
            <bottom>341</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Tape Speed</name>
        <script>on mouseDown--This pop-up menu allows you to select the recording--speed of your video tape. Hold down the mouse button--here to see your choices. Move the cursor to your--choice and release the mouse button.put "104,88,72,56,40,24,8" into yOffListput "none" & return & "1 hr" & return & "2 hr" & return & ¬"3 hr" & return & "4 hr" & return & ¬"6 hr" & return & "8 hr" & return into choicesput whereInList(me,choices) into checkedput item checked of yOffList into yOffif checked is 0 thenput empty into checkedput 104 into yOffend ifget HPopupMenu(choices,checked,top of me - yOff,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownif theChoice is "none" thenput empty into meelseput theChoice into meend ifend mouseDown</script>
    </part>
    <part>
        <id>63</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>445</left>
            <top>329</top>
            <right>501</right>
            <bottom>342</bottom>
        </rect>
        <style>radiobutton</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <name>Stereo</name>
        <script>on mouseDown--This indicates whether or not the episode was--recorded in stereo.set the hilite of me to not the hilite of meend mouseDown</script>
    </part>
    <part>
        <id>56</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>9</left>
            <top>217</top>
            <right>64</right>
            <bottom>251</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>outline</textStyle>
        <textStyle>bold</textStyle>
        <name>Info</name>
        <script>on mouseUp--Click here to show or hide the Episode Information--window, where basic information on this episode is--stored. This information is used to mark shows for--report generation.global theTargetset cursor to watchif the visible of bg button "Hide Info" is false thenif the visible of bg button "Hide Marks" is true thensend "mouseUp" to bg button "Hide Marks"end ifif the visible of bg button "Hide Report" is true thensend "mouseUp" to bg button "Hide Report"end iflock screenshow bg button "Hide Info"show bg button "Episode Information"show field "Info Back"show field "Episode Info"unlock screen with dissolve very fastelsesend "mouseUp" to bg button "Hide Info"end ifend mouseUp</script>
    </part>
    <part>
        <id>105</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>417</left>
            <top>91</top>
            <right>430</right>
            <bottom>104</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseDownsend "mouseDown" to field "Cast or Guests"end mouseDown</script>
    </part>
    <part>
        <id>53</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>167</left>
            <top>34</top>
            <right>210</right>
            <bottom>56</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Prev Marked</name>
        <script>on mouseDown--Click here to see the previous marked show.--It will beep if no shows are marked.mouseStillDownend mouseDown————————————————————————————————————————————————————————————————————————on mouseStillDownlock screenif the number of marked cards is 0 thenplayBeepelsego to prev marked cardend ifunlock screen with wipe right fastend mouseStillDown————————————————————————————————————————————————————————————————————————on mouseEnterhelpEnterend mouseEnter————————————————————————————————————————————————————————————————————————on mouseLeavehelpLeaveend mouseLeave</script>
    </part>
    <part>
        <id>54</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>373</left>
            <top>34</top>
            <right>416</right>
            <bottom>56</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Next Marked</name>
        <script>on mouseDown--Click here to see the next marked show.--It will beep if no shows are marked.mouseStillDownend mouseDown————————————————————————————————————————————————————————————————————————on mouseStillDownlock screenif the number of marked cards is 0 thenplayBeepelsego to next marked cardend ifunlock screen with wipe left fastend mouseStillDown</script>
    </part>
    <part>
        <id>106</id>
        <type>field</type>
        <visible> <true /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>218</left>
            <top>181</top>
            <right>340</right>
            <bottom>196</bottom>
        </rect>
        <style>rectangle</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>bold</textStyle>
        <textHeight>13</textHeight>
        <name>Short or Long</name>
        <script>on mouseDown--This pop-up menu allows you to select to view--the Short Synopsis, the Long Synopsis, or the--Episode Notes. Hold down the mouse button here--to see your choices. Move the cursor to your--choice and release the mouse button.put me into oldChoiceput "Short Synopsis" & return & ¬"Long Synopsis" & return & ¬"Episode Notes" & return into choicesput whereInList(me,choices) into checkedget HPopupMenu(choices,checked,top of me - 3,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownput theChoice into melock screenhide field oldChoiceshow field theChoiceunlock screen with dissolve very fastend mouseDown</script>
    </part>
    <part>
        <id>107</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>326</left>
            <top>181</top>
            <right>339</right>
            <bottom>194</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseDownsend "mouseDown" to field "Short or Long"end mouseDown</script>
    </part>
    <part>
        <id>108</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>79</left>
            <top>195</top>
            <right>499</right>
            <bottom>322</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <true /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Episode Notes</name>
        <script>on mouseUp--This holds notes on this episode, including--background on the script, plot variations discarded,--and other things of interest.----Clicking on an underlined episode name activates a--HyperText link that takes you to that show's listing.global oldShowLinks,oldShowNames,STstacksif the textStyle of the clickChunk contains "group" thenselect the clickChunkset the cursor to watchlock screenput "card " & the number of this card & " of " & ¬the name of this stack into tempif temp is in oldShowLinks thenget whereInList(temp,oldShowLinks)delete line it of oldShowLinksdelete line it of oldShowNamesend ifput temp & return before oldShowLinksput field "Title" & " [#" & field "Program Number" & "] — DS9" into tempif temp contains "," then put "." into char offset(",",temp) of tempput temp & return before oldShowNamesif the number of lines of oldShowNames = 11 thendelete the last line of oldShowNamesdelete the last line of oldShowLinksend ifget the clickTextif the last char of it is "]" thenput the last word of it into numdelete the first char of numif the first char of num is "#" then delete the first char of numdelete the last char of numput num - 400 into showNumif num < 100 thenput line 1 of STstacks into stackNameif stackName is not empty thengo to stack stackNameput num into showNumelseplayBeepanswer "You do not have a copy of the" & return & ¬"'Star Trek-TOS Guide' stack yet." with "OK"exit mouseUpend ifend ifif num > 100 and num < 400 thenput line 2 of STstacks into stackNameif stackName is not empty thengo to stack stackNameput num - 100 into showNumelseplayBeepanswer "You do not have a copy of the" & return & ¬"'Star Trek-TNG Guide' stack yet." with "OK"exit mouseUpend ifend ifput length(it) into lendelete char offset("[",it)-1 to len of itend ifif showNum < the number of this card then go to card 1put unkwote(it) into itfind whole it in field "Title"if the result is not empty then--beepfind whole num in field "Program Number"end ifunlock screen with dissolve fastend ifend mouseUp</script>
    </part>
    <part>
        <id>111</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>121</left>
            <top>34</top>
            <right>164</right>
            <bottom>56</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Prev Season</name>
        <script>on mouseDown--Click here to see the first show of--the previous season.mouseStillDownend mouseDown————————————————————————————————————————————————————————————————————————on mouseStillDownglobal numSeasonsif numSeasons is 1 thenplayBeepexit mouseStillDownend iflock screenget field "Season"if it is 1 thengo to card (the number of cards of this bg - 50)find numSeasons in field "Season"elseif it is 2 thengo to card 1elsego to card (the number of this card - 50)find it-1 in field "Season"end ifend ifunlock screen with wipe right fastend mouseStillDown</script>
    </part>
    <part>
        <id>114</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>433</left>
            <top>182</top>
            <right>499</right>
            <bottom>196</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <name>Old Links   </name>
        <script>on mouseDown--This pop-up menu allows you to view a list of--the shows you have accessed using the HyperText--links. Hold down the mouse button here to see--your choices. Move the cursor to your choice--and release the mouse button to go to that show.global oldShowLinks,oldShowNamesif oldShowLinks is empty thenplayBeepexit mouseDownend ifget HPopupMenu(oldShowNames,,bottom of me,left of me + 3,palatino,12)put item 3 of it into theChoiceif theChoice is empty then exit mouseDownlock screenset the hilite of me to falseset the cursor to watchput "card " & the number of this card & " of " & ¬the name of this stack into tempif temp is in oldShowLinks thenget whereInList(temp,oldShowLinks)delete line it of oldShowLinksdelete line it of oldShowNamesend ifput temp & return before oldShowLinksput field "Title" & " [#" & field "Program Number" & "] — DS9" into tempif temp contains "," then put "." into char offset(",",temp) of tempput temp & return before oldShowNamesif the number of lines of oldShowNames = 11 thendelete the last line of oldShowNamesdelete the last line of oldShowLinksend ifadd 1 to theChoiceget line theChoice of oldShowLinksdelete line theChoice of oldShowLinksdelete line theChoice of oldShowNamesgo to itunlock screen with dissolve fastend mouseDown</script>
    </part>
    <part>
        <id>112</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>419</left>
            <top>34</top>
            <right>462</right>
            <bottom>56</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Next Season</name>
        <script>on mouseDown--Click here to see the first show of--the next season.mouseStillDownend mouseDown————————————————————————————————————————————————————————————————————————on mouseStillDownglobal numSeasonsif numSeasons is 1 thenplayBeepexit mouseStillDownend iflock screenget field "Season"if it is numSeasons thengo to card 1elsefind it+1 in field "Season"end ifunlock screen with wipe left fastend mouseStillDown</script>
    </part>
    <part>
        <id>115</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>485</left>
            <top>182</top>
            <right>498</right>
            <bottom>195</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseDownsend "mouseDown" to bg button "Old Links   "end mouseDown</script>
    </part>
    <part>
        <id>42</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>134</left>
            <top>63</top>
            <right>426</right>
            <bottom>303</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>10</textSize>
        <textStyle>bold</textStyle>
        <textHeight>13</textHeight>
        <name>Mark Back</name>
        <script></script>
    </part>
    <part>
        <id>43</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>139</left>
            <top>110</top>
            <right>237</right>
            <bottom>129</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>Which Field</name>
        <script>on mouseDown--This pop-up menu allows you to choose which field you--want to search in. Hold down the mouse button here to--see your choices. Move the cursor to your choice and--release the mouse button.put "Title" & return & "Writers" & return & "Director" & return & ¬"Season" & return & "Guests" & return & "The episode" & return & ¬"Show Taped" & return & "Episode Notes" & return & ¬"Anything" into choicesput whereInList(me,choices) into checkedget HPopupMenu(choices,checked,top of me + 1,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownlock screenif theChoice = "The episode" thenput "is about" into field "What Condition"set the style of field "What Condition" to transparenthide bg button "P2"put "Click here to select  " into field "What Target"set textStyle of line 1 of field "What Target" to italicshow field "What Target"show bg button "P3"elseif theChoice = "Show Taped" thenput "is true" into field "What Condition"set the style of field "What Condition" to shadowshow bg button "P2"hide field "What Target"hide bg button "P3"elseput "contains" into field "What Condition"set the style of field "What Condition" to transparenthide bg button "P2"put "Click here to edit" into field "What Target"set textStyle of line 1 of field "What Target" to italicshow field "What Target"hide bg button "P3"end ifend ifif theChoice <> me thenput empty into field "Show List"put "(0)" into field "Num Marked"put empty into field "Done It"end ifput theChoice into meunlock screenend mouseDown</script>
    </part>
    <part>
        <id>44</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>135</left>
            <top>64</top>
            <right>423</right>
            <bottom>82</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>bold</textStyle>
        <name>Mark the Shows</name>
        <script>on mouseDown--This allows you to move the Show Marking window--around the screen. Simply hold the mouse button--down and drag the window around, until you have--it where you want it.put rect of field "Mark Back" into theAreaput fulldrag(theArea,"0,0,512,342") into Moveif first word of Move is "Error" thenanswer Moveelselock screenset the topLeft of me to newPos(the topLeft of me,Move)set the topLeft of field "Mark Back"      to newPos(the topLeft of field "Mark Back",Move)set the topLeft of bg button "Hide Marks" to newPos(the topLeft of bg button "Hide Marks",Move)set the topLeft of field "Which Field"    to newPos(the topLeft of field "Which Field",Move)set the topLeft of field "What Condition" to newPos(the topLeft of field "What Condition",Move)set the topLeft of field "What Target"    to newPos(the topLeft of field "What Target",Move)set the topLeft of field "Num Marked"     to newPos(the topLeft of field "Num Marked",Move)set the topLeft of field "Show List"      to newPos(the topLeft of field "Show List",Move)set the topLeft of bg button "Do It"      to newPos(the topLeft of bg button "Do It",Move)set the topLeft of bg button "Unmark All" to newPos(the topLeft of bg button "Unmark All",Move)set the topLeft of bg button "P1" to newPos(the topLeft of bg button "P1",Move)set the topLeft of bg button "P2" to newPos(the topLeft of bg button "P2",Move)set the topLeft of bg button "P3" to newPos(the topLeft of bg button "P3",Move)unlock screenend ifend mouseDown————————————————————————————————————————————————————————————————————————function newPos theRect,Moveadd item 1 of Move to item 1 of theRectadd item 2 of Move to item 2 of theRectreturn theRectend newPos</script>
    </part>
    <part>
        <id>46</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>135</left>
            <top>65</top>
            <right>153</right>
            <bottom>79</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3720</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Hide Marks</name>
        <script>on mouseUp--Click here to hide the Show Marking window.global fieldName,condition,theTarget,theList,numMarkedset the icon of me to "Active Close Box"wait 5set the icon of me to "Close Box"lock screenhide mehide bg button "Mark the Shows"hide field "Mark Back"hide field "Which Field"hide field "What Condition"hide field "What Target"hide bg button "Do It"hide bg button "Unmark All"hide field "Show List"hide field "Num Marked"hide bg button "P1"hide bg button "P2"hide bg button "P3"if field "Done It" is empty thenput fieldName into field "Which Field"put condition into field "What Condition"put theTarget into field "What Target"put theList into field "Show List"put numMarked into field "Num Marked"end ifunlock screen with dissolve very fastend mouseUp————————————————————————————————————————————————————————————————————————on mouseStillDownsend "mouseUp" to meend mouseStillDown</script>
    </part>
    <part>
        <id>48</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>239</left>
            <top>110</top>
            <right>303</right>
            <bottom>129</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textHeight>16</textHeight>
        <name>What Condition</name>
        <script>on mouseDown--This pop-up menu allows you to choose the condition--for your search. Hold down the mouse button here to--see your choices. Move the cursor to your choice and--release the mouse button.if field "Which Field" is not "Show Taped" then exit mouseDownput "is true" & return & "is false" & return into choicesput -1 into checkedif me is "is true" then put -2 into checkedget HPopupMenu(choices,checked,top of me + 1,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownput theChoice into meend mouseDown</script>
    </part>
    <part>
        <id>49</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <true /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>306</left>
            <top>110</top>
            <right>420</right>
            <bottom>129</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>15</textHeight>
        <name>What Target</name>
        <script>on mouseDown--This holds the item you want to search for in--the field you have indicated.put "Look for which " & field "Which Field" & "…" into theChoiceif field "Which Field" is "Anything" then put "Look for what…" into theChoiceif field "Which Field" is "The episode" thenput "<IEdit the name…" & ";-;" & return into choicesput "Benjamin Sisko" & return & "Odo" & return & ¬"Dr. Julian Bashir" & return & "Jadzia Dax" & return & ¬"Miles O'Brien" & return & "Quark" & return & ¬"Kira Nerys" & return after choicesput ";-;" & "Klingons" & return & ¬"Romulans" & return & "Ferengi" & return & ¬"Cardassians" & return after choicesput whereInList(me,choices)+1 into checkedif checked > 11 then add 1 to checkedif checked = 1 then put 0 into checkedget HPopupMenu(choices,checked,top of me + 1,left of me + 3)put item 1 of it into theChoiceif theChoice = "-" then exit mouseDownif theChoice is empty then exit mouseDownend ifif theChoice contains "Edit the name" or theChoice contains "Look for" thenput me into stringif the textStyle of word 1 of me is italic then put empty into stringask theChoice with stringif it is empty then exit mouseDownput it into theChoiceend ifif theChoice <> me thenput empty into field "Show List"put "(0)" into field "Num Marked"put empty into field "Done It"end ifput theChoice into meend mouseDown</script>
    </part>
    <part>
        <id>50</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>162</left>
            <top>151</top>
            <right>407</right>
            <bottom>261</bottom>
        </rect>
        <style>scrolling</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Show List</name>
        <script>on mouseUp--This holds a list of the shows that were--marked by the query shown. If  †  is after the--name then you have this episode on video tape.----If you click on a name, it will take you to the--show listing for that episode.put word 2 of the clickLine into sLineput line sLine of me into newLineif newLine is empty then exit mouseUp--select the whole line to show choiceget offset(return & newLine & return,me) + 1select char it to length(newLine) + it of meset cursor to watchlock screenif the last word of newLine is "†" thendelete the last char of newLinedelete the last char of newLineend iffind whole newLine in field "Title"send "mouseUp" to bg button "Hide Marks"unlock screen with dissolve fastend mouseUp</script>
    </part>
    <part>
        <id>51</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>332</left>
            <top>137</top>
            <right>381</right>
            <bottom>152</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>bold</textStyle>
        <textHeight>12</textHeight>
        <name>Num Marked</name>
        <script></script>
    </part>
    <part>
        <id>52</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>237</left>
            <top>278</top>
            <right>319</right>
            <bottom>296</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>bold</textStyle>
        <name>Do It</name>
        <script>on mouseUp--Click here to start performing the query listed above.--It will mark all shows which fit the conditions--listed, and it will build a list of the episode--names for those shows.global numput field "Which Field" into fieldNameput field "What Target" into theTargetif fieldName is "The episode" then put "Episode Info" into fieldNameif fieldName is "Anything" thenplayBeepanswer "This search could take several minutes." with "Cancel" or "Do It!"if it is "Cancel" then exit mouseUpend ifpush cardPromptoid "Now marking shows.",24354if fieldName is "Show Taped" then checkForTapesset the dontSearch of field "Episode Info" to falselock screenput 0 into numput empty into field "Show List"set lockMessages to trueunmark all cardsgo to card 1put 0 into firstCardrepeat foreverplanetCursorif fieldName is "Anything" thenfind whole TheTargetelsefind whole theTarget in field fieldNameend ifif the result is not empty or the number of this card = firstCard then exit repeatincludeThisCardif firstCard = 0 then put the number of this card into firstCardgo to next card of this bgend repeatset lockMessages to falsepop cardput "(" & num & ")" into field "Num Marked"if num = 0 thenplayBeepelsesaveMarkInfo   --in stack scriptend ifunlock screenclose window "Promptoid"set the dontSearch of field "Episode Info" to trueend mouseUp————————————————————————————————————————————————————————————————————————on checkForTapesglobal numput word 2 of field "What Condition" into conditionlock screenput 0 into numput empty into field "Show List"set lockMessages to trueunmark all cardsrepeat with n = 1 to the number of cards of this bgplanetCursorgo to card nput field "Tape Name" into tapeNameif condition is "true" and tapeName is not empty then includeThisCardif condition is "false" and tapeName is empty then includeThisCardend repeatset lockMessages to falsepop cardput "(" & num & ")" into field "Num Marked"saveMarkInfo   --in stack scriptunlock screenhide message boxexit to hyperCardend checkForTapes————————————————————————————————————————————————————————————————————————on includeThisCardglobal numput empty into extraif field "Tape Name" is not empty then put " †" into extraput field "Title" & extra & return after field "Show List"set the marked of this card to trueadd 1 to numend includeThisCard</script>
    </part>
    <part>
        <id>57</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>74</left>
            <top>62</top>
            <right>277</right>
            <bottom>190</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>bold</textStyle>
        <textHeight>13</textHeight>
        <name>Info Back</name>
        <script></script>
    </part>
    <part>
        <id>58</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>75</left>
            <top>63</top>
            <right>274</right>
            <bottom>81</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>bold</textStyle>
        <name>Episode Information</name>
        <script>on mouseDown--This allows you to move the Episode Information window--around the screen. Simply hold the mouse button down--and drag the window around, until you have it--where you want it.put rect of field "Info Back" into theAreaput fulldrag(theArea,"0,0,512,342") into Moveif first word of Move is "Error" thenanswer Moveelselock screenset the topLeft of me to newPos(the topLeft of me,Move)set the topLeft of field "Info Back"     to newPos(the topLeft of field "Info Back",Move)set the topLeft of bg button "Hide Info" to newPos(the topLeft of bg button "Hide Info",Move)set the topLeft of field "Episode Info"  to newPos(the topLeft of field "Episode Info",Move)unlock screenend ifend mouseDown————————————————————————————————————————————————————————————————————————function newPos theRect,Moveadd item 1 of Move to item 1 of theRectadd item 2 of Move to item 2 of theRectreturn theRectend newPos</script>
    </part>
    <part>
        <id>59</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>75</left>
            <top>64</top>
            <right>93</right>
            <bottom>78</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3720</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Hide Info</name>
        <script>on mouseUp--Click here to hide the Episode Information window.set the icon of me to "Active Close Box"wait 5set the icon of me to "Close Box"lock screenhide mehide bg button "Episode Information"hide field "Info Back"hide field "Episode Info"unlock screen with dissolve very fastend mouseUp————————————————————————————————————————————————————————————————————————on mouseStillDownsend "mouseUp" to meend mouseStillDown</script>
    </part>
    <part>
        <id>60</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <false /> </sharedText>
        <fixedLineHeight> <true /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>159</left>
            <top>86</top>
            <right>270</right>
            <bottom>185</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <true /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>9</textSize>
        <textStyle>plain</textStyle>
        <textHeight>12</textHeight>
        <name>Episode Info</name>
        <script>on mouseUp--This holds a list of information about this--episode, which is used to mark cards for report--generation.end mouseUp</script>
    </part>
    <part>
        <id>76</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>350</left>
            <top>299</top>
            <right>381</right>
            <bottom>316</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Done It</name>
        <script></script>
    </part>
    <part>
        <id>78</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>71</left>
            <top>174</top>
            <right>239</right>
            <bottom>321</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Report Back</name>
        <script></script>
    </part>
    <part>
        <id>79</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>72</left>
            <top>175</top>
            <right>236</right>
            <bottom>193</bottom>
        </rect>
        <style>rectangle</style>
        <showName> <true /> </showName>
        <highlight> <true /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>12</textSize>
        <textStyle>extend</textStyle>
        <textStyle>bold</textStyle>
        <name>Create a Report</name>
        <script>on mouseDown--This allows you to move the Report Creation window--around the screen. Simply hold the mouse button--down and drag the window around, until you have--it where you want it.put rect of field "Report Back" into theAreaput fulldrag(theArea,"0,0,512,342") into Moveif first word of Move is "Error" thenanswer Moveelselock screenset the topLeft of me to newPos(the topLeft of me,Move)set the topLeft of field "Report Back"     to newPos(the topLeft of field "Report Back",Move)set the topLeft of bg button "Hide Report" to newPos(the topLeft of bg button "Hide Report",Move)set the topLeft of field "Report Type"     to newPos(the topLeft of field "Report Type",Move)set the topLeft of field "Which Shows"     to newPos(the topLeft of field "Which Shows",Move)set the topLeft of field "Send Where"      to newPos(the topLeft of field "Send Where",Move)set the topLeft of field "File Creator"    to newPos(the topLeft of field "File Creator",Move)set the topLeft of bg button "Make Report" to newPos(the topLeft of bg button "Make Report",Move)set the topLeft of bg button "Pulldown 1" to newPos(the topLeft of bg button "Pulldown 1",Move)set the topLeft of bg button "Pulldown 2" to newPos(the topLeft of bg button "Pulldown 2",Move)set the topLeft of bg button "Pulldown 3" to newPos(the topLeft of bg button "Pulldown 3",Move)set the topLeft of bg button "Pulldown 4" to newPos(the topLeft of bg button "Pulldown 4",Move)unlock screenend ifend mouseDown————————————————————————————————————————————————————————————————————————function newPos theRect,Moveadd item 1 of Move to item 1 of theRectadd item 2 of Move to item 2 of theRectreturn theRectend newPos</script>
    </part>
    <part>
        <id>80</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>72</left>
            <top>176</top>
            <right>90</right>
            <bottom>190</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <false /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>3720</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Hide Report</name>
        <script>on mouseUp--Click here to hide the Report Creation window.set the icon of me to "Active Close Box"wait 5set the icon of me to "Close Box"lock screenhide mehide bg button "Create a Report"hide field "Report Back"hide field "Report Type"hide field "Which Shows"hide field "Send Where"hide field "File Creator"hide bg button "Make Report"hide bg button "Pulldown 1"hide bg button "Pulldown 2"hide bg button "Pulldown 3"hide bg button "Pulldown 4"unlock screen with dissolve very fastend mouseUp————————————————————————————————————————————————————————————————————————on mouseStillDownsend "mouseUp" to meend mouseStillDown</script>
    </part>
    <part>
        <id>81</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>77</left>
            <top>201</top>
            <right>231</right>
            <bottom>220</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>Report Type</name>
        <script>on mouseDown--This pop-up menu allows you to select the type of--report you want to generate. Hold down the mouse--button here to see your choices. Move the cursor--to your choice and release the mouse button.put "Full report" & return & "Short report" & return & ¬"One line report" & return into choicesput whereInList(me,choices) into checkedget HPopupMenu(choices,checked,top of me + 1,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownput theChoice into meend mouseDown</script>
    </part>
    <part>
        <id>82</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>77</left>
            <top>225</top>
            <right>231</right>
            <bottom>244</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>Which Shows</name>
        <script>on mouseDown--This pop-up menu allows you to select which shows to--generate a report for. Hold down the mouse button--here to see your choices. Move the cursor to your--choice and release the mouse button.put "for this show" & return & "for marked shows" & return & ¬"for all shows" & return into choicesput whereInList(me,choices) into checkedget HPopupMenu(choices,checked,top of me + 1,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownput theChoice into meend mouseDown</script>
    </part>
    <part>
        <id>83</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>77</left>
            <top>249</top>
            <right>231</right>
            <bottom>268</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>Send Where</name>
        <script>on mouseDown--This pop-up menu allows you to choose whether to send--the report to a file or the printer (small fonts for--LaserWriters, large fonts for ImageWriters).--Hold down the mouse button here to see your choices.put "save to file" & return & ¬"send to printer [small]" & return & ¬"send to printer [large]" & return into choicesput whereInList(me,choices) into checkedget HPopupMenu(choices,checked,top of me + 1,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownlock screenput theChoice into meif the last word of me is in "[small],[large]" thenset the textSize of the last word of me to 10set the textStyle of the last word of me to "plain,condense"end ifif theChoice is "save to file" thenshow field "File Creator"show bg button "Pulldown 4"elsehide field "File Creator"hide bg button "Pulldown 4"end ifunlock screenend mouseDown</script>
    </part>
    <part>
        <id>84</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>113</left>
            <top>297</top>
            <right>196</right>
            <bottom>313</bottom>
        </rect>
        <style>roundrect</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <name>Make Report</name>
        <script>on mouseUp--Click here to create the report that you--specified above.put field "Report Type" into reportTypeput word 2 of field "Which Shows" into whichShowsput word 3 of field "Send Where" into sendWhereif whichShows is "marked" and the number of marked cards is 0 thenplay "ComputerBeep"answer "There are no marked shows to make a report for." &¬" Please mark some shows and try again." with "OK"exit mouseUpend ifif sendWhere is "printer" thenanswer "Send this report to the printer?" with "No" or "Yes"if it is "No" then exit mouseUpset cursor to watchgo to this cardpush cardlock screenif word 4 of field "Send Where" is "[large]" thenput reportType && "Large" into reportTypeend ifopen report printing with template reportTypeif whichShows is "this" thenprint this cardelse if whichShows is "marked" thengo to card 1print marked cardselsego to card 1print all cardsend ifclose printingpop cardunlock screenexit mouseUpend ifask file "Save this file as…" with "DS9" && reportTypeif it is empty then exit mouseUpput it into fNameopen file fNameif reportType is "One line report" thenwrite "TITLE" & tab & "SEASON" & tab & "NUMBER" & tab & "STARDATE" & ¬tab & "AIR DATE" & tab & "VCR TAPE" & tab & "COUNT" & return to file fNameend ifif whichShows is "this" thenset cursor to watchwrite reportEntry(reportType) & return to file fNamewrite "This report was generated by Star Trek-DS9™ Episode Guide Stackware"¬& return & "created by David Landis, ©Oak Mountain Software 1991-1993"¬to file fNameclose file fNameget ChangeFileType(fName,"TEXT",field "Creator")exit mouseUpend ifpush cardlock screenif whichShows = "all" thenput the number of cards of this bg into numRecordselseput the number of marked cards into numRecordsend ifgo to card 1if whichShows = "marked" then go to first marked cardput lastHCitem(":",fName) into fileNamePromptoid "Writing '" & fileName & "': " & "0 shows written. 0% done.      ",24354open file fNameif whichShows = "marked" thenwrite "This is a report of shows where " & field "Which Field" && ¬field "What Condition" && field "What Target" & "." & return & ¬return & return to file fNameend ifrepeat with num = 1 to numRecordsplanetCursorwrite reportEntry(reportType) & return & return to file fNameset text of window "Promptoid" to "Writing '" & fileName & "': " & ¬num & " shows written. " & trunc(num*100/numRecords) & "% done."if whichShows = "all" thengo to next cardelsego to next marked cardend ifend repeatwrite "This report was generated by Star Trek-DS9™ Episode Guide Stackware"¬& return & "created by David Landis, ©Oak Mountain Software 1991-1993"¬to file fNameclose file fNameclose window "Promptoid"pop cardget ChangeFileType(fName,"TEXT",field "Creator")unlock screenend mouseUp————————————————————————————————————————————————————————————————————————function reportEntry reportTypeif reportType is "One line report" thenput field "Title" & tab into tempput field "Season" & tab after tempput field "Number" & tab after tempput field "Stardate" & tab after tempput field "Air Date" & tab after tempput field "Tape Name" & tab after tempput field "Count" & return after tempelseput "TITLE: " & field "Title" & return & return into tempput "WRITERS: " & field "Writers" & return & return after tempput "DIRECTOR: " & field "Director" & return & return after tempput "SEASON: " & field "Season" & tab & "NUMBER: "¬& field "Number" & tab & "PROGRAM#: " & ¬field "Program Number" & return after tempput "STARDATE: " & field "Stardate" & tab & "AIR DATE: "¬& field "Air Date" & return & return after tempif field "Guests" is not empty thenput "GUEST STARS" & return after tempput field "Guests" & return after tempif last char of field "Guests" <> return then put return after tempend ifput "PLOT SYNOPSIS" & return after tempif reportType is "Short report" thenput field "Short Synopsis" & return & return after tempelseput field "Long Synopsis" & return & return after tempput "EPISODE NOTES" & return after tempput field "Episode Notes" & return & return after tempend ifend ifreturn tempend reportEntry</script>
    </part>
    <part>
        <id>88</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>154</left>
            <top>279</top>
            <right>220</right>
            <bottom>294</bottom>
        </rect>
        <style>shadow</style>
        <showName> <true /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <true /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <name>Unmark All</name>
        <script>on mouseUp--Click here to unmark all the shows in this stack.answer "Are you sure you want to unmark all shows?" with "Yes" or "No"if it is "No" then exit mouseUplock screenunmark all cardsput empty into field "Show List"put "(0)" into field "Num Marked"saveMarkInfo   --in stack scriptunlock screenend mouseUp</script>
    </part>
    <part>
        <id>89</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>77</left>
            <top>273</top>
            <right>231</right>
            <bottom>292</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>condense</textStyle>
        <textStyle>bold</textStyle>
        <textHeight>16</textHeight>
        <name>File Creator</name>
        <script>on mouseDown--This pop-up menu allows you to choose the creator of--your report file (the word-processor that will open--when the file's icon is activated). Hold down the--mouse button here to see your choices. Move the--cursor to your choice and release the mouse button.put "as MacWrite" & return & ¬"as MacWrite II" & return & ¬"as MS Word" & return & ¬"as TeachText" & return & ¬"as WordPerfect" & return & ¬"as WriteNow" & return into choicesput "MACA,MWII,MSWD,ttxt,WPC2,nX^n" into creatorListput whereInList(me,choices) into checkedput (6-checked)*15 into dyget HPopupMenu(choices,checked,top of me - dy - 3,left of me + 3)put item 1 of it into theChoiceif theChoice is empty then exit mouseDownput theChoice into meput item whereInList(me,choices) of creatorList into field "Creator"end mouseDown</script>
    </part>
    <part>
        <id>68</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>173</left>
            <top>287</top>
            <right>371</right>
            <bottom>302</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>Credit Button</name>
        <script>on mouseDown--Click here to show the credit window, where the--contributors of this stack are listed.select line 1 of mewait 1select emptyhide mehide window "Star Trek-DS9 Guide"lock screenshow field "Credits"unlock screen with dissolve very fastset the cursor to handrepeat until the mouseClickend repeatlock screenhide field "Credits"unlock screen with dissolve very fastend mouseDown</script>
    </part>
    <part>
        <id>95</id>
        <type>button</type>
        <visible> <true /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>420</left>
            <top>328</top>
            <right>437</right>
            <bottom>341</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name></name>
        <script>on mouseDownsend "mouseDown" to field "Tape Speed"end mouseDown</script>
    </part>
    <part>
        <id>91</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <true /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>12</left>
            <top>328</top>
            <right>59</right>
            <bottom>342</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Creator</name>
        <script></script>
    </part>
    <part>
        <id>96</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>2</left>
            <top>3</top>
            <right>45</right>
            <bottom>17</bottom>
        </rect>
        <style>transparent</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>left</textAlign>
        <font>Geneva</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <textHeight>16</textHeight>
        <name>Sound On</name>
        <script></script>
    </part>
    <part>
        <id>97</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>216</left>
            <top>201</top>
            <right>229</right>
            <bottom>218</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Pulldown 1</name>
        <script>on mouseDownsend "mouseDown" to field "Report Type"end mouseDown</script>
    </part>
    <part>
        <id>98</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>216</left>
            <top>225</top>
            <right>229</right>
            <bottom>242</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Pulldown 2</name>
        <script>on mouseDownsend "mouseDown" to field "Which Shows"end mouseDown</script>
    </part>
    <part>
        <id>99</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>216</left>
            <top>249</top>
            <right>229</right>
            <bottom>266</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Pulldown 3</name>
        <script>on mouseDownsend "mouseDown" to field "Send Where"end mouseDown</script>
    </part>
    <part>
        <id>100</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>216</left>
            <top>273</top>
            <right>229</right>
            <bottom>290</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>Pulldown 4</name>
        <script>on mouseDownsend "MouseDown" to field "File Creator"end mouseDown</script>
    </part>
    <part>
        <id>101</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>405</left>
            <top>110</top>
            <right>418</right>
            <bottom>127</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>P3</name>
        <script>on mouseDownsend "mouseDown" to field "What Target"end mouseDown</script>
    </part>
    <part>
        <id>102</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>222</left>
            <top>110</top>
            <right>235</right>
            <bottom>127</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>P1</name>
        <script>on mouseDownsend "mouseDown" to field "Which Field"end mouseDown</script>
    </part>
    <part>
        <id>103</id>
        <type>button</type>
        <visible> <false /> </visible>
        <reserved5> 0 </reserved5>
        <reserved4> 0 </reserved4>
        <reserved3> 0 </reserved3>
        <reserved2> 0 </reserved2>
        <reserved1> 0 </reserved1>
        <enabled> <true /> </enabled>
        <rect>
            <left>288</left>
            <top>110</top>
            <right>301</right>
            <bottom>127</bottom>
        </rect>
        <style>transparent</style>
        <showName> <false /> </showName>
        <highlight> <false /> </highlight>
        <autoHighlight> <false /> </autoHighlight>
        <sharedHighlight> <true /> </sharedHighlight>
        <family>0</family>
        <titleWidth>0</titleWidth>
        <icon>31383</icon>
        <textAlign>center</textAlign>
        <font>Chicago</font>
        <textSize>12</textSize>
        <textStyle>plain</textStyle>
        <name>P2</name>
        <script>on mouseDownsend "mouseDown" to field "What Condition"end mouseDown</script>
    </part>
    <part>
        <id>69</id>
        <type>field</type>
        <visible> <false /> </visible>
        <dontWrap> <false /> </dontWrap>
        <dontSearch> <false /> </dontSearch>
        <sharedText> <true /> </sharedText>
        <fixedLineHeight> <false /> </fixedLineHeight>
        <autoTab> <false /> </autoTab>
        <lockText> <true /> </lockText>
        <rect>
            <left>98</left>
            <top>5</top>
            <right>448</right>
            <bottom>338</bottom>
        </rect>
        <style>shadow</style>
        <autoSelect> <false /> </autoSelect>
        <showLines> <false /> </showLines>
        <wideMargins> <false /> </wideMargins>
        <multipleLines> <false /> </multipleLines>
        <reservedFamily> 0 </reservedFamily>
        <titleWidth>0</titleWidth>
        <icon>0</icon>
        <textAlign>center</textAlign>
        <font>Palatino</font>
        <textSize>10</textSize>
        <textStyle>plain</textStyle>
        <textHeight>13</textHeight>
        <name>Credits</name>
        <script>on mouseUplock screenhide mehide field "Credit Button"unlock screen with dissolve very fastend mouseUp</script>
    </part>
    <content>
        <layer>background</layer>
        <id>42</id>
        <text><span class="style24"></span><span class="style1"></span><span class="style39">Mark shows where:</span><span class="style1"></span><span class="style4"></span><span class="style1"></span><span class="style20">List of shows marked  </span><span class="style36"></span><span class="style20">  Click on an episode title to see the show.</span><span class="style37"></span><span class="style38">                                                                                            † means you have a tape</span></text>
    </content>
    <content>
        <layer>background</layer>
        <id>51</id>
        <text>(0)</text>
    </content>
    <content>
        <layer>background</layer>
        <id>57</id>
        <text><span class="style1">Main Characters:Main Antagonist:Main Location:</span><span class="style5"> (planet, ship)</span></text>
    </content>
    <content>
        <layer>background</layer>
        <id>68</id>
        <text>Show the Credits</text>
    </content>
    <content>
        <layer>background</layer>
        <id>69</id>
        <text><span class="style1"></span><span class="style18">Star Trek:Deep Space Nine</span><span class="style17">™</span><span class="style18">Episode Guide</span><span class="style6"></span><span class="style31">version 2.0</span><span class="style1">created by David R. Landis</span><span class="style30">[e-mail]</span><span class="style1">© Oak Mountain Software 1991-1993, All Rights ReservedStar Trek™ was created by Gene RoddenberryStar Trek:DS9™ was created by Rick Berman and Michael PillarStar Trek™ is a registered Trademark of Paramount Pictures Inc.</span><span class="style20"></span><span class="style24">Credits</span><span class="style1">Plot Synopses : Jennifer A. Hawthorne</span><span class="style8"></span><span class="style1">Help System : David Landis & Bill JohnstonPlanet Cursor : David LandisSpecial Thanks to Matt Gomes and Mark Anthony Young</span><span class="style20"></span><span class="style1">XCMD's : FullBalloons, Promptoid, and                             Textoid 3.1 by Frédéric Rinaldi                XFCN's : HPopUpMenu by Jon Pugh                                 Files by Guy de Picciotto                             ChangeFileType by Larry Wolfarth                                   ListSelect,FullDrag by Frédéric Rinaldi                                GetComments, HelpPosition, and                                   WhereInList  by David Landis</span></text>
    </content>
    <content>
        <layer>background</layer>
        <id>73</id>
        <text>Guests</text>
    </content>
    <content>
        <layer>background</layer>
        <id>72</id>
        <text>Patrick Stewart as Capt. Jean-Luc PicardJonathan Frakes as Cmdr. William RikerLeVar Burton as Lt. [j.g.] Geordi La ForgeDenise Crosby as Lt. Natasha "Tasha" YarMichael Dorn as Lt. [j.g.] WorfGates McFadden as Dr. Beverly CrusherMarina Sirtis as Counselor Deanna TroiBrent Spiner as Lt. Commander DataWil Wheaton as Wesley "Wes" Crusher</text>
    </content>
    <content>
        <layer>background</layer>
        <id>81</id>
        <text>Short report</text>
    </content>
    <content>
        <layer>background</layer>
        <id>82</id>
        <text>for marked shows</text>
    </content>
    <content>
        <layer>background</layer>
        <id>83</id>
        <text>save to file</text>
    </content>
    <content>
        <layer>background</layer>
        <id>89</id>
        <text>as WriteNow</text>
    </content>
    <content>
        <layer>background</layer>
        <id>91</id>
        <text>nX^n</text>
    </content>
    <content>
        <layer>background</layer>
        <id>106</id>
        <text>Long Synopsis</text>
    </content>
    <content>
        <layer>background</layer>
        <id>96</id>
        <text>True</text>
    </content>
    <content>
        <layer>background</layer>
        <id>48</id>
        <text>is about</text>
    </content>
    <content>
        <layer>background</layer>
        <id>43</id>
        <text>The episode</text>
    </content>
    <content>
        <layer>background</layer>
        <id>49</id>
        <text>Cardassians</text>
    </content>
    <name>Episodes</name>
    <script>on mouseEnterhelpEnterend mouseEnter————————————————————————————————————————————————————————————————————————on mouseLeavehelpLeaveend mouseLeave————————————————————————————————————————————————————————————————————————on openCardglobal oldTitleput field "Title" into oldTitleend openCard————————————————————————————————————————————————————————————————————————on closeCardset the scroll of field "Long Synopsis" to 0set the scroll of field "Episode Notes" to 0set the scroll of field "Guests" to 0set the scroll of field "Main Cast" to 0if the visible of field "Credit Button" is true thenclose window "Star Trek-DS9 Guide"hide field "Credit Button"hide field "Credits"end ifend closeCard————————————————————————————————————————————————————————————————————————function lastHCItem delim,theText-- returns the portion of <theText> that follows the last <delim>if delim is in theText thenput lastHCItem(delim,char offset(delim,theText) + 1 to ¬length(theText) of theText) into theTextend ifreturn theTextend lastHCItem————————————————————————————————————————————————————————————————————————on mouseDownInPicturelock screenclose window "Star Trek-DS9 Guide"hide field "Credit Button"unlock screen with dissolve very fastend mouseDownInPicture————————————————————————————————————————————————————————————————————————on idleglobal system7,helpModeif system7 thenFullBalloons "isOn"if the result is "true" thenif not helpMode thenhelpModeOnend ifelseif helpMode thenhelpModeOnend ifend ifend ifif visible of bg button " Next" is true and the optionKey is up thenhide bg button " Next"end ifif there is a window "Promptoid" then close window "Promptoid"pass idleend idle</script>
</background>